home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC Gamer (Italian) 46
/
PC Gamer IT CD 46 1-2.iso
/
PCGAMER.EXE
/
0
/
RCDATA
/
TFMFORM
/
TFMFORM.txt
< prev
Wrap
Text File
|
1999-10-10
|
3KB
|
119 lines
object FMForm: TFMForm
Left = 555
Top = 426
Width = 435
Height = 300
Caption = 'File manager example'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
Position = poDefault
OnCreate = FormCreate
PixelsPerInch = 120
TextHeight = 16
object StatusBar: TPanel
Left = 0
Top = 204
Width = 427
Height = 50
Align = alBottom
BevelOuter = bvNone
TabOrder = 0
object DirectoryPanel: TPanel
Left = 0
Top = 0
Width = 228
Height = 50
Align = alLeft
BevelInner = bvLowered
BevelWidth = 2
TabOrder = 0
end
object FilePanel: TPanel
Left = 228
Top = 0
Width = 199
Height = 50
Align = alClient
BevelInner = bvLowered
BevelWidth = 2
TabOrder = 1
object Floppy: TImage
Left = 30
Top = 20
Width = 16
Height = 9
AutoSize = True
Picture.Data = {<image000.bmp>}
Visible = False
end
object Fixed: TImage
Left = 59
Top = 20
Width = 16
Height = 9
AutoSize = True
Picture.Data = {<image001.bmp>}
Visible = False
end
object Network: TImage
Left = 89
Top = 20
Width = 16
Height = 9
AutoSize = True
Picture.Data = {<image002.bmp>}
Visible = False
end
object CDRom: TImage
Left = 121
Top = 20
Width = 16
Height = 9
AutoSize = True
Picture.Data = {<image003.bmp>}
Visible = False
end
object RamDisk: TImage
Left = 145
Top = 20
Width = 16
Height = 9
AutoSize = True
Picture.Data = {<image004.bmp>}
Visible = False
end
end
end
object DriveTabSet: TTabSet
Left = 0
Top = 178
Width = 427
Height = 26
Align = alBottom
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'MS Sans Serif'
Font.Style = []
Style = tsOwnerDraw
OnChange = DriveTabSetChange
OnDrawTab = DriveTabSetDrawTab
OnMeasureTab = DriveTabSetMeasureTab
end
object DirectoryOutline: TDirectoryOutline
Left = 0
Top = 0
Width = 198
Height = 178
Align = alLeft
ItemHeight = 16
OnChange = DirectoryOutlineChange
OnDragDrop = DirectoryOutlineDragDrop
OnDragOver = DirectoryOutlineDragOver
Options = [ooDrawFocusRect]
PictureLeaf.Data = {<image005. BM� B ( � | � @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ @@@ ��������� >}